home *** CD-ROM | disk | FTP | other *** search
/ The Netherlands - A Compact World / The Netherlands.iso / dev / links.dxr / 00004_daans gethoofdstukscript.ls < prev    next >
Encoding:
Text File  |  2002-01-09  |  399 b   |  15 lines

  1. property spriteNum
  2. global hoofdstuk, vertaaldehoofdstuktitels, tekstkleur
  3.  
  4. on beginSprite me
  5.   if hoofdstuk <> VOID then
  6.     pos = hoofdstuk.getPos(sprite(spriteNum).member.name)
  7.     sprite(spriteNum).member.text = vertaaldehoofdstuktitels[pos]
  8.   end if
  9.   if tekstkleur = VOID then
  10.     sprite(spriteNum).member.foreColor = 235
  11.   else
  12.     sprite(spriteNum).member.foreColor = tekstkleur
  13.   end if
  14. end
  15.